1533 lines
		
	
	
		
			60 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
			
		
		
	
	
			1533 lines
		
	
	
		
			60 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
| <?php
 | |
| /**
 | |
|  * package.xml generation class, package.xml version 2.0
 | |
|  *
 | |
|  * PHP versions 4 and 5
 | |
|  *
 | |
|  * LICENSE: This source file is subject to version 3.0 of the PHP license
 | |
|  * that is available through the world-wide-web at the following URI:
 | |
|  * http://www.php.net/license/3_0.txt.  If you did not receive a copy of
 | |
|  * the PHP License and are unable to obtain it through the web, please
 | |
|  * send a note to license@php.net so we can mail you a copy immediately.
 | |
|  *
 | |
|  * @category   pear
 | |
|  * @package    PEAR
 | |
|  * @author     Greg Beaver <cellog@php.net>
 | |
|  * @author     Stephan Schmidt (original XML_Serializer code)
 | |
|  * @copyright  1997-2006 The PHP Group
 | |
|  * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
 | |
|  * @version    CVS: $Id: v2.php,v 1.34 2006/03/02 20:50:59 cellog Exp $
 | |
|  * @link       http://pear.php.net/package/PEAR
 | |
|  * @since      File available since Release 1.4.0a1
 | |
|  */
 | |
| /**
 | |
|  * file/dir manipulation routines
 | |
|  */
 | |
| require_once 'System.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 <cellog@php.net>
 | |
|  * @author     Stephan Schmidt (original XML_Serializer code)
 | |
|  * @copyright  1997-2006 The PHP Group
 | |
|  * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
 | |
|  * @version    Release: 1.4.11
 | |
|  * @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'             => ' ',                    // string used for indentation
 | |
|                          'linebreak'          => "\n",                  // string used for newlines
 | |
|                          'typeHints'          => false,                 // automatically add type hin attributes
 | |
|                          'addDecl'            => true,                 // add an XML declaration
 | |
|                          'defaultTagName'     => 'XML_Serializer_Tag',  // tag used for indexed arrays or invalid names
 | |
|                          'classAsTagName'     => false,                 // use classname for objects in indexed arrays
 | |
|                          'keyAttribute'       => '_originalKey',        // attribute where original key is stored
 | |
|                          'typeAttribute'      => '_type',               // attribute for type (only if typeHints => true)
 | |
|                          'classAttribute'     => '_class',              // attribute for class of objects (only if typeHints => true)
 | |
|                          'scalarAsAttributes' => false,                 // scalar values (strings, ints,..) will be serialized as attribute
 | |
|                          'prependAttributes'  => '',                    // prepend string for attributes
 | |
|                          'indentAttributes'   => false,                 // indent the attributes, if set to '_auto', it will indent attributes so they all start at the same column
 | |
|                          'mode'               => 'simplexml',             // use 'simplexml' to use parent name as tagname if transforming an indexed array
 | |
|                          'addDoctype'         => false,                 // add a doctype declaration
 | |
|                          'doctype'            => null,                  // supply a string or an array with id and uri ({@see PEAR_PackageFile_Generator_v2_PEAR_PackageFile_Generator_v2_XML_Util::getDoctypeDeclaration()}
 | |
|                          'rootName'           => 'package',                  // name of the root tag
 | |
|                          'rootAttributes'     => 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
 | |
| 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'    => 'attribs',                  // all values in this key will be treated as attributes
 | |
|                          'contentName'        => '_content',                   // this value will be used directly as content, instead of creating a new tag, may only be used in conjuction with attributesArray
 | |
|                          'beautifyFilelist'   => false,
 | |
|                          'encoding' => '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 PEAR_PackageFile_Generator_v2(&$packagefile)
 | |
|     {
 | |
|         $this->_packagefile = &$packagefile;
 | |
|     }
 | |
| 
 | |
|     /**
 | |
|      * @return string
 | |
|      */
 | |
|     function getPackagerVersion()
 | |
|     {
 | |
|         return '1.4.11';
 | |
|     }
 | |
| 
 | |
|     /**
 | |
|      * @param PEAR_Packager
 | |
|      * @param bool generate a .tgz or a .tar
 | |
|      * @param string|null temporary directory to package in
 | |
|      */
 | |
|     function toTgz(&$packager, $compress = true, $where = null)
 | |
|     {
 | |
|         $a = null;
 | |
|         return $this->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(&$packager, &$pf1, $compress = true, $where = null)
 | |
|     {
 | |
|         require_once 'Archive/Tar.php';
 | |
|         if (!$this->_packagefile->isEquivalent($pf1)) {
 | |
|             return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: "' .
 | |
|                 basename($pf1->getPackageFile()) .
 | |
|                 '" is not equivalent to "' . basename($this->_packagefile->getPackageFile())
 | |
|                 . '"');
 | |
|         }
 | |
|         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: "' . $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_v2::toTgz: unable to save package.xml as' .
 | |
|                 ' "' . $where . DIRECTORY_SEPARATOR . 'package.xml"');
 | |
|         }
 | |
|         if (!$this->_packagefile->validate(PEAR_VALIDATE_PACKAGING)) {
 | |
|             return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: invalid package.xml');
 | |
|         }
 | |
|         $ext = $compress ? '.tgz' : '.tar';
 | |
|         $pkgver = $this->_packagefile->getPackage() . '-' . $this->_packagefile->getVersion();
 | |
|         $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_v2::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_v2::toTgz: package file object must ' .
 | |
|                 'be created from a real file');
 | |
|         }
 | |
|         // {{{ Create the package file list
 | |
|         $filelist = array();
 | |
|         $i = 0;
 | |
|         $this->_packagefile->flattenFilelist();
 | |
|         $contents = $this->_packagefile->getContents();
 | |
|         if (isset($contents['bundledpackage'])) { // bundles of packages
 | |
|             $contents = $contents['bundledpackage'];
 | |
|             if (!isset($contents[0])) {
 | |
|                 $contents = array($contents);
 | |
|             }
 | |
|             $packageDir = $where;
 | |
|             foreach ($contents as $i => $package) {
 | |
|                 $fname = $package;
 | |
|                 $file = $pkgdir . DIRECTORY_SEPARATOR . $fname;
 | |
|                 if (!file_exists($file)) {
 | |
|                     return $packager->raiseError("File does not exist: $fname");
 | |
|                 }
 | |
|                 $tfile = $packageDir . DIRECTORY_SEPARATOR . $fname;
 | |
|                 System::mkdir(array('-p', dirname($tfile)));
 | |
|                 copy($file, $tfile);
 | |
|                 $filelist[$i++] = $tfile;
 | |
|                 $packager->log(2, "Adding package $fname");
 | |
|             }
 | |
|         } else { // normal packages
 | |
|             $contents = $contents['dir']['file'];
 | |
|             if (!isset($contents[0])) {
 | |
|                 $contents = array($contents);
 | |
|             }
 | |
|     
 | |
|             $packageDir = $where;
 | |
|             foreach ($contents as $i => $file) {
 | |
|                 $fname = $file['attribs']['name'];
 | |
|                 $atts = $file['attribs'];
 | |
|                 $orig = $file;
 | |
|                 $file = $pkgdir . DIRECTORY_SEPARATOR . $fname;
 | |
|                 if (!file_exists($file)) {
 | |
|                     return $packager->raiseError("File does not exist: $fname");
 | |
|                 } else {
 | |
|                     $tfile = $packageDir . DIRECTORY_SEPARATOR . $fname;
 | |
|                     unset($orig['attribs']);
 | |
|                     if (count($orig)) { // file with tasks
 | |
|                         // run any package-time tasks
 | |
|                         if (function_exists('file_get_contents')) {
 | |
|                             $contents = file_get_contents($file);
 | |
|                         } else {
 | |
|                             $fp = fopen($file, "r");
 | |
|                             $contents = @fread($fp, filesize($file));
 | |
|                             fclose($fp);
 | |
|                         }
 | |
|                         foreach ($orig as $tag => $raw) {
 | |
|                             $tag = str_replace($this->_packagefile->getTasksNs() . ':', '', $tag);
 | |
|                             $task = "PEAR_Task_$tag";
 | |
|                             $task = &new $task($this->_packagefile->_config,
 | |
|                                 $this->_packagefile->_logger,
 | |
|                                 PEAR_TASK_PACKAGE);
 | |
|                             $task->init($raw, $atts, null);
 | |
|                             $res = $task->startSession($this->_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, "wb");
 | |
|                             fwrite($wp, $contents);
 | |
|                             fclose($wp);
 | |
|                         }
 | |
|                     }
 | |
|                     if (!file_exists($tfile)) {
 | |
|                         System::mkdir(array('-p', dirname($tfile)));
 | |
|                         copy($file, $tfile);
 | |
|                     }
 | |
|                     $filelist[$i++] = $tfile;
 | |
|                     $this->_packagefile->setFileAttribute($fname, 'md5sum', md5_file($tfile), $i - 1);
 | |
|                     $packager->log(2, "Adding file $fname");
 | |
|                 }
 | |
|             }
 | |
|         }
 | |
|             // }}}
 | |
|         if ($pf1 !== null) {
 | |
|             $name = 'package2.xml';
 | |
|         } else {
 | |
|             $name = 'package.xml';
 | |
|         }
 | |
|         $packagexml = $this->toPackageFile($where, PEAR_VALIDATE_PACKAGING, $name);
 | |
|         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 $packager->raiseError($ok);
 | |
|             } elseif (!$ok) {
 | |
|                 return $packager->raiseError('PEAR_Packagefile_v2::toTgz(): adding ' . $name .
 | |
|                     ' failed');
 | |
|             }
 | |
|             // ----- Add the content of the package
 | |
|             if (!$tar->addModify($filelist, $pkgver, $where)) {
 | |
|                 return $packager->raiseError(
 | |
|                     'PEAR_Packagefile_v2::toTgz(): tarball creation failed');
 | |
|             }
 | |
|             // add the package.xml version 1.0
 | |
|             if ($pf1 !== null) {
 | |
|                 $pfgen = &$pf1->getDefaultGenerator();
 | |
|                 $packagexml1 = $pfgen->toPackageFile($where, PEAR_VALIDATE_PACKAGING,
 | |
|                     'package.xml', true);
 | |
|                 if (!$tar->addModify(array($packagexml1), '', $where)) {
 | |
|                     return $packager->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->_packagefile->validate($state)) {
 | |
|             return PEAR::raiseError('PEAR_Packagefile_v2::toPackageFile: invalid package.xml',
 | |
|                 null, null, null, $this->_packagefile->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: "' . $where . '" 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 ' .
 | |
|                "$name as $newpkgfile");
 | |
|         }
 | |
|         fwrite($np, $this->toXml($state));
 | |
|         fclose($np);
 | |
|         return $newpkgfile;
 | |
|     }
 | |
| 
 | |
|     function &toV2()
 | |
|     {
 | |
|         return $this->_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->_packagefile->setDate(date('Y-m-d'));
 | |
|         $this->_packagefile->setTime(date('H:i:s'));
 | |
|         if (!$this->_packagefile->validate($state)) {
 | |
|             return false;
 | |
|         }
 | |
|         if (is_array($options)) {
 | |
|             $this->options = array_merge($this->_defaultOptions, $options);
 | |
|         } else {
 | |
|             $this->options = $this->_defaultOptions;
 | |
|         }
 | |
|         $arr = $this->_packagefile->getArray();
 | |
|         if (isset($arr['filelist'])) {
 | |
|             unset($arr['filelist']);
 | |
|         }
 | |
|         if (isset($arr['_lastversion'])) {
 | |
|             unset($arr['_lastversion']);
 | |
|         }
 | |
|         if ($state ^ PEAR_VALIDATE_PACKAGING && !isset($arr['bundle'])) {
 | |
|             $use = $this->_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->options['beautifyFilelist'] = true;
 | |
|         }
 | |
|         $arr['attribs']['packagerversion'] = '1.4.11';
 | |
|         if ($this->serialize($arr, $options)) {
 | |
|             return $this->_serializedData . "\n";
 | |
|         }
 | |
|         return false;
 | |
|     }
 | |
| 
 | |
| 
 | |
|     function _recursiveXmlFilelist($list)
 | |
|     {
 | |
|         $dirs = array();
 | |
|         if (isset($list['attribs'])) {
 | |
|             $file = $list['attribs']['name'];
 | |
|             unset($list['attribs']['name']);
 | |
|             $attributes = $list['attribs'];
 | |
|             $this->_addDir($dirs, explode('/', dirname($file)), $file, $attributes);
 | |
|         } else {
 | |
|             foreach ($list as $a) {
 | |
|                 $file = $a['attribs']['name'];
 | |
|                 $attributes = $a['attribs'];
 | |
|                 unset($a['attribs']);
 | |
|                 $this->_addDir($dirs, explode('/', dirname($file)), $file, $attributes, $a);
 | |
|             }
 | |
|         }
 | |
|         $this->_formatDir($dirs);
 | |
|         $this->_deFormat($dirs);
 | |
|         return $dirs;
 | |
|     }
 | |
| 
 | |
|     function _addDir(&$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->_addDir($dirs['dir'][$curdir], $dir, $file, $attributes, $tasks);
 | |
|     }
 | |
| 
 | |
|     function _formatDir(&$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 => $contents) {
 | |
|                 $this->_formatDir($dirs['dir'][$dir]);
 | |
|             }
 | |
|         }
 | |
|         if (isset($dirs['file'])) {
 | |
|             uksort($dirs['file'], 'strnatcasecmp');
 | |
|         };
 | |
|     }
 | |
| 
 | |
|     function _deFormat(&$dirs)
 | |
|     {
 | |
|         if (!count($dirs)) {
 | |
|             return array();
 | |
|         }
 | |
|         $newdirs = array();
 | |
|         if (isset($dirs['dir'])) {
 | |
|             foreach ($dirs['dir'] as $dir => $contents) {
 | |
|                 $newdir = array();
 | |
|                 $newdir['attribs']['name'] = $dir;
 | |
|                 $this->_deFormat($contents);
 | |
|                 foreach ($contents as $tag => $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 => $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->options = $this->_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->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->options = array_merge($this->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->options;
 | |
|             if (isset($options['overrideOptions']) && $options['overrideOptions'] == true) {
 | |
|                 $this->options = array_merge($this->_defaultOptions, $options);
 | |
|             } else {
 | |
|                 $this->options = array_merge($this->options, $options);
 | |
|             }
 | |
|         }
 | |
|         else {
 | |
|             $optionsBak = null;
 | |
|         }
 | |
|         
 | |
|         //  start depth is zero
 | |
|         $this->_tagDepth = 0;
 | |
| 
 | |
|         $this->_serializedData = '';
 | |
|         // serialize an array
 | |
|         if (is_array($data)) {
 | |
|             if (isset($this->options['rootName'])) {
 | |
|                 $tagName = $this->options['rootName'];
 | |
|             } else {
 | |
|                 $tagName = 'array';
 | |
|             }
 | |
| 
 | |
|             $this->_serializedData .= $this->_serializeArray($data, $tagName, $this->options['rootAttributes']);
 | |
|         }
 | |
|         
 | |
|         // add doctype declaration
 | |
|         if ($this->options['addDoctype'] === true) {
 | |
|             $this->_serializedData = PEAR_PackageFile_Generator_v2_XML_Util::getDoctypeDeclaration($tagName, $this->options['doctype'])
 | |
|                                    . $this->options['linebreak']
 | |
|                                    . $this->_serializedData;
 | |
|         }
 | |
| 
 | |
|         //  build xml declaration
 | |
|         if ($this->options['addDecl']) {
 | |
|             $atts = array();
 | |
|             if (isset($this->options['encoding']) ) {
 | |
|                 $encoding = $this->options['encoding'];
 | |
|             } else {
 | |
|                 $encoding = null;
 | |
|             }
 | |
|             $this->_serializedData = PEAR_PackageFile_Generator_v2_XML_Util::getXMLDeclaration('1.0', $encoding)
 | |
|                                    . $this->options['linebreak']
 | |
|                                    . $this->_serializedData;
 | |
|         }
 | |
|         
 | |
|         
 | |
| 		if ($optionsBak !== null) {
 | |
| 			$this->options = $optionsBak;
 | |
| 		}
 | |
| 		
 | |
|         return  true;
 | |
|     }
 | |
| 
 | |
|    /**
 | |
|     * get the result of the serialization
 | |
|     *
 | |
|     * @access public
 | |
|     * @return string serialized XML
 | |
|     */
 | |
|     function getSerializedData()
 | |
|     {
 | |
|         if ($this->_serializedData == null ) {
 | |
|             return  $this->raiseError('No serialized data available. Use XML_Serializer::serialize() first.', XML_SERIALIZER_ERROR_NO_SERIALIZATION);
 | |
|         }
 | |
|         return $this->_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->_serializeArray($value, $tagName, $attributes);
 | |
|         } elseif (is_object($value)) {
 | |
|             $xml = $this->_serializeObject($value, $tagName);
 | |
|         } else {
 | |
|             $tag = array(
 | |
|                           'qname'      => $tagName,
 | |
|                           'attributes' => $attributes,
 | |
|                           'content'    => $value
 | |
|                         );
 | |
|             $xml = $this->_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     PEAR_PackageFile_Generator_v2_XML_Util::isValidName() to check, whether key has to be substituted
 | |
|     */
 | |
|     function _serializeArray(&$array, $tagName = null, $attributes = array())
 | |
|     {
 | |
|         $_content = null;
 | |
|         
 | |
|         /**
 | |
|          * check for special attributes
 | |
|          */
 | |
|         if ($this->options['attributesArray'] !== null) {
 | |
|             if (isset($array[$this->options['attributesArray']])) {
 | |
|                 $attributes = $array[$this->options['attributesArray']];
 | |
|                 unset($array[$this->options['attributesArray']]);
 | |
|             }
 | |
|             /**
 | |
|              * check for special content
 | |
|              */
 | |
|             if ($this->options['contentName'] !== null) {
 | |
|                 if (isset($array[$this->options['contentName']])) {
 | |
|                     $_content = $array[$this->options['contentName']];
 | |
|                     unset($array[$this->options['contentName']]);
 | |
|                 }
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         /*
 | |
|         * if mode is set to simpleXML, check whether
 | |
|         * the array is associative or indexed
 | |
|         */
 | |
|         if (is_array($array) && $this->options['mode'] == 'simplexml') {
 | |
|             $indexed = true;
 | |
|             if (!count($array)) {
 | |
|                 $indexed = false;
 | |
|             }
 | |
|             foreach ($array as $key => $val) {
 | |
|                 if (!is_int($key)) {
 | |
|                     $indexed = false;
 | |
|                     break;
 | |
|                 }
 | |
|             }
 | |
| 
 | |
|             if ($indexed && $this->options['mode'] == 'simplexml') {
 | |
|                 $string = '';
 | |
|                 foreach ($array as $key => $val) {
 | |
|                     if ($this->options['beautifyFilelist'] && $tagName == 'dir') {
 | |
|                         if (!isset($this->_curdir)) {
 | |
|                             $this->_curdir = '';
 | |
|                         }
 | |
|                         $savedir = $this->_curdir;
 | |
|                         if (isset($val['attribs'])) {
 | |
|                             if ($val['attribs']['name'] == '/') {
 | |
|                                 $this->_curdir = '/';
 | |
|                             } else {
 | |
|                                 if ($this->_curdir == '/') {
 | |
|                                     $this->_curdir = '';
 | |
|                                 }
 | |
|                                 $this->_curdir .= '/' . $val['attribs']['name'];
 | |
|                             }
 | |
|                         }
 | |
|                     }
 | |
|                     $string .= $this->_serializeValue( $val, $tagName, $attributes);
 | |
|                     if ($this->options['beautifyFilelist'] && $tagName == 'dir') {
 | |
|                         $string .= ' <!-- ' . $this->_curdir . ' -->';
 | |
|                         if (empty($savedir)) {
 | |
|                             unset($this->_curdir);
 | |
|                         } else {
 | |
|                             $this->_curdir = $savedir;
 | |
|                         }
 | |
|                     }
 | |
|                     
 | |
|                     $string .= $this->options['linebreak'];
 | |
|         			//	do indentation
 | |
|                     if ($this->options['indent']!==null && $this->_tagDepth>0) {
 | |
|                         $string .= str_repeat($this->options['indent'], $this->_tagDepth);
 | |
|                     }
 | |
|                 }
 | |
|                 return rtrim($string);
 | |
|             }
 | |
|         }
 | |
|         
 | |
| 		if ($this->options['scalarAsAttributes'] === true) {
 | |
| 	        foreach ($array as $key => $value) {
 | |
| 				if (is_scalar($value) && (PEAR_PackageFile_Generator_v2_XML_Util::isValidName($key) === true)) {
 | |
| 					unset($array[$key]);
 | |
| 					$attributes[$this->options['prependAttributes'].$key] = $value;
 | |
| 				}
 | |
| 			}
 | |
| 		}
 | |
| 
 | |
|         // check for empty array => create empty tag
 | |
|         if (empty($array)) {
 | |
|             $tag = array(
 | |
|                             'qname'      => $tagName,
 | |
|                             'content'    => $_content,
 | |
|                             'attributes' => $attributes
 | |
|                         );
 | |
| 
 | |
|         } else {
 | |
|             $this->_tagDepth++;
 | |
|             $tmp = $this->options['linebreak'];
 | |
|             foreach ($array as $key => $value) {
 | |
|     			//	do indentation
 | |
|                 if ($this->options['indent']!==null && $this->_tagDepth>0) {
 | |
|                     $tmp .= str_repeat($this->options['indent'], $this->_tagDepth);
 | |
|                 }
 | |
|     
 | |
|     			//	copy key
 | |
|     			$origKey	=	$key;
 | |
|     			//	key cannot be used as tagname => use default tag
 | |
|                 $valid = PEAR_PackageFile_Generator_v2_XML_Util::isValidName($key);
 | |
|     	        if (PEAR::isError($valid)) {
 | |
|     	            if ($this->options['classAsTagName'] && is_object($value)) {
 | |
|     	                $key = get_class($value);
 | |
|     	            } else {
 | |
|             	        $key = $this->options['defaultTagName'];
 | |
|     	            }
 | |
|            	 	}
 | |
|                 $atts = array();
 | |
|                 if ($this->options['typeHints'] === true) {
 | |
|                     $atts[$this->options['typeAttribute']] = gettype($value);
 | |
|     				if ($key !== $origKey) {
 | |
|     					$atts[$this->options['keyAttribute']] = (string)$origKey;
 | |
|     				}
 | |
|     
 | |
|                 }
 | |
|                 if ($this->options['beautifyFilelist'] && $key == 'dir') {
 | |
|                     if (!isset($this->_curdir)) {
 | |
|                         $this->_curdir = '';
 | |
|                     }
 | |
|                     $savedir = $this->_curdir;
 | |
|                     if (isset($value['attribs'])) {
 | |
|                         if ($value['attribs']['name'] == '/') {
 | |
|                             $this->_curdir = '/';
 | |
|                         } else {
 | |
|                             $this->_curdir .= '/' . $value['attribs']['name'];
 | |
|                         }
 | |
|                     }
 | |
|                 }
 | |
| 
 | |
|                 if (is_string($value) && $value && ($value{strlen($value) - 1} == "\n")) {
 | |
|                     $value .= str_repeat($this->options['indent'], $this->_tagDepth);
 | |
|                 }
 | |
|                 $tmp .= $this->_createXMLTag(array(
 | |
|                                                     'qname'      => $key,
 | |
|                                                     'attributes' => $atts,
 | |
|                                                     'content'    => $value )
 | |
|                                             );
 | |
|                 if ($this->options['beautifyFilelist'] && $key == 'dir') {
 | |
|                     if (isset($value['attribs'])) {
 | |
|                         $tmp .= ' <!-- ' . $this->_curdir . ' -->';
 | |
|                         if (empty($savedir)) {
 | |
|                             unset($this->_curdir);
 | |
|                         } else {
 | |
|                             $this->_curdir = $savedir;
 | |
|                         }
 | |
|                     }
 | |
|                 }
 | |
|                 $tmp .= $this->options['linebreak'];
 | |
|             }
 | |
|             
 | |
|             $this->_tagDepth--;
 | |
|             if ($this->options['indent']!==null && $this->_tagDepth>0) {
 | |
|                 $tmp .= str_repeat($this->options['indent'], $this->_tagDepth);
 | |
|             }
 | |
|     
 | |
|     		if (trim($tmp) === '') {
 | |
|     			$tmp = null;
 | |
|     		}
 | |
|     		
 | |
|             $tag = array(
 | |
|                             'qname'      => $tagName,
 | |
|                             'content'    => $tmp,
 | |
|                             'attributes' => $attributes
 | |
|                         );
 | |
|         }
 | |
|         if ($this->options['typeHints'] === true) {
 | |
|             if (!isset($tag['attributes'][$this->options['typeAttribute']])) {
 | |
|                 $tag['attributes'][$this->options['typeAttribute']] = 'array';
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         $string = $this->_createXMLTag($tag, false);
 | |
|         return $string;
 | |
|     }
 | |
|   
 | |
|    /**
 | |
|     * create a tag from an array
 | |
|     * this method awaits an array in the following format
 | |
|     * array(
 | |
|     *       'qname'        => $tagName,
 | |
|     *       'attributes'   => array(),
 | |
|     *       'content'      => $content,      // optional
 | |
|     *       'namespace'    => $namespace     // optional
 | |
|     *       'namespaceUri' => $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->options['indentAttributes'] !== false) {
 | |
|             $multiline = true;
 | |
|             $indent    = str_repeat($this->options['indent'], $this->_tagDepth);
 | |
| 
 | |
|             if ($this->options['indentAttributes'] == '_auto') {
 | |
|                 $indent .= str_repeat(' ', (strlen($tag['qname'])+2));
 | |
| 
 | |
|             } else {
 | |
|                 $indent .= $this->options['indentAttributes'];
 | |
|             }
 | |
|         } else {
 | |
|             $multiline = false;
 | |
|             $indent    = false;
 | |
|         }
 | |
|     
 | |
|         if (is_array($tag['content'])) {
 | |
|             if (empty($tag['content'])) {
 | |
|                 $tag['content'] =   '';
 | |
|             }
 | |
|         } elseif(is_scalar($tag['content']) && (string)$tag['content'] == '') {
 | |
|             $tag['content'] =   '';
 | |
|         }
 | |
|     
 | |
|         if (is_scalar($tag['content']) || is_null($tag['content'])) {
 | |
|             if ($this->options['encoding'] == 'UTF-8' &&
 | |
|                   version_compare(phpversion(), '5.0.0', 'lt')) {
 | |
|                 $encoding = PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_UTF8_XML;
 | |
|             } else {
 | |
|                 $encoding = PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML;
 | |
|             }
 | |
|             $tag = PEAR_PackageFile_Generator_v2_XML_Util::createTagFromArray($tag, $replaceEntities, $multiline, $indent, $this->options['linebreak'], $encoding);
 | |
|         } elseif (is_array($tag['content'])) {
 | |
|             $tag    =   $this->_serializeArray($tag['content'], $tag['qname'], $tag['attributes']);
 | |
|         } elseif (is_object($tag['content'])) {
 | |
|             $tag    =   $this->_serializeObject($tag['content'], $tag['qname'], $tag['attributes']);
 | |
|         } elseif (is_resource($tag['content'])) {
 | |
|             settype($tag['content'], 'string');
 | |
|             $tag    =   PEAR_PackageFile_Generator_v2_XML_Util::createTagFromArray($tag, $replaceEntities);
 | |
|         }
 | |
|         return  $tag;
 | |
|     }
 | |
| }
 | |
| 
 | |
| // well, it's one way to do things without extra deps ...
 | |
| /* vim: set expandtab tabstop=4 shiftwidth=4: */
 | |
| // +----------------------------------------------------------------------+
 | |
| // | PHP Version 4                                                        |
 | |
| // +----------------------------------------------------------------------+
 | |
| // | Copyright (c) 1997-2002 The PHP Group                                |
 | |
| // +----------------------------------------------------------------------+
 | |
| // | This source file is subject to version 2.0 of the PHP license,       |
 | |
| // | that is bundled with this package in the file LICENSE, and is        |
 | |
| // | available at through the world-wide-web at                           |
 | |
| // | http://www.php.net/license/2_02.txt.                                 |
 | |
| // | If you did not receive a copy of the PHP license and are unable to   |
 | |
| // | obtain it through the world-wide-web, please send a note to          |
 | |
| // | license@php.net so we can mail you a copy immediately.               |
 | |
| // +----------------------------------------------------------------------+
 | |
| // | Authors: Stephan Schmidt <schst@php-tools.net>                       |
 | |
| // +----------------------------------------------------------------------+
 | |
| //
 | |
| //    $Id: v2.php,v 1.34 2006/03/02 20:50:59 cellog Exp $
 | |
| 
 | |
| /**
 | |
|  * error code for invalid chars in XML name
 | |
|  */
 | |
| define("PEAR_PackageFile_Generator_v2_XML_Util_ERROR_INVALID_CHARS", 51);
 | |
| 
 | |
| /**
 | |
|  * error code for invalid chars in XML name
 | |
|  */
 | |
| define("PEAR_PackageFile_Generator_v2_XML_Util_ERROR_INVALID_START", 52);
 | |
| 
 | |
| /**
 | |
|  * error code for non-scalar tag content
 | |
|  */
 | |
| define("PEAR_PackageFile_Generator_v2_XML_Util_ERROR_NON_SCALAR_CONTENT", 60);
 | |
|     
 | |
| /**
 | |
|  * error code for missing tag name
 | |
|  */
 | |
| define("PEAR_PackageFile_Generator_v2_XML_Util_ERROR_NO_TAG_NAME", 61);
 | |
|     
 | |
| /**
 | |
|  * replace XML entities
 | |
|  */
 | |
| define("PEAR_PackageFile_Generator_v2_XML_Util_REPLACE_ENTITIES", 1);
 | |
| 
 | |
| /**
 | |
|  * embedd content in a CData Section
 | |
|  */
 | |
| define("PEAR_PackageFile_Generator_v2_XML_Util_CDATA_SECTION", 2);
 | |
| 
 | |
| /**
 | |
|  * do not replace entitites
 | |
|  */
 | |
| define("PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_NONE", 0);
 | |
| 
 | |
| /**
 | |
|  * replace all XML entitites
 | |
|  * This setting will replace <, >, ", ' and &
 | |
|  */
 | |
| define("PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML", 1);
 | |
| 
 | |
| /**
 | |
|  * replace only required XML entitites
 | |
|  * This setting will replace <, " and &
 | |
|  */
 | |
| define("PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML_REQUIRED", 2);
 | |
| 
 | |
| /**
 | |
|  * replace HTML entitites
 | |
|  * @link    http://www.php.net/htmlentities
 | |
|  */
 | |
| define("PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_HTML", 3);
 | |
| 
 | |
| /**
 | |
|  * replace all XML entitites, and encode from ISO-8859-1 to UTF-8
 | |
|  * This setting will replace <, >, ", ' and &
 | |
|  */
 | |
| define("PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_UTF8_XML", 4);
 | |
| 
 | |
| /**
 | |
|  * utility class for working with XML documents
 | |
|  * 
 | |
|  * customized version of XML_Util 0.6.0
 | |
|  *
 | |
|  * @category XML
 | |
|  * @package  PEAR
 | |
|  * @version  0.6.0
 | |
|  * @author   Stephan Schmidt <schst@php.net>
 | |
|  * @author   Gregory Beaver <cellog@php.net>
 | |
|  */
 | |
| class PEAR_PackageFile_Generator_v2_XML_Util {
 | |
| 
 | |
|    /**
 | |
|     * return API version
 | |
|     *
 | |
|     * @access   public
 | |
|     * @static
 | |
|     * @return   string  $version API version
 | |
|     */
 | |
|     function apiVersion()
 | |
|     {
 | |
|         return "0.6";
 | |
|     }
 | |
| 
 | |
|    /**
 | |
|     * replace XML entities
 | |
|     *
 | |
|     * With the optional second parameter, you may select, which
 | |
|     * entities should be replaced.
 | |
|     *
 | |
|     * <code>
 | |
|     * require_once 'XML/Util.php';
 | |
|     * 
 | |
|     * // replace XML entites:
 | |
|     * $string = PEAR_PackageFile_Generator_v2_XML_Util::replaceEntities("This string contains < & >.");
 | |
|     * </code>
 | |
|     *
 | |
|     * @access   public
 | |
|     * @static
 | |
|     * @param    string  string where XML special chars should be replaced
 | |
|     * @param    integer setting for entities in attribute values (one of PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML, PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML_REQUIRED, PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_HTML)
 | |
|     * @return   string  string with replaced chars
 | |
|     */
 | |
|     function replaceEntities($string, $replaceEntities = PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML)
 | |
|     {
 | |
|         switch ($replaceEntities) {
 | |
|             case PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_UTF8_XML:
 | |
|                 return strtr(utf8_encode($string),array(
 | |
|                                           '&'  => '&',
 | |
|                                           '>'  => '>',
 | |
|                                           '<'  => '<',
 | |
|                                           '"'  => '"',
 | |
|                                           '\'' => ''' ));
 | |
|                 break;
 | |
|             case PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML:
 | |
|                 return strtr($string,array(
 | |
|                                           '&'  => '&',
 | |
|                                           '>'  => '>',
 | |
|                                           '<'  => '<',
 | |
|                                           '"'  => '"',
 | |
|                                           '\'' => ''' ));
 | |
|                 break;
 | |
|             case PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML_REQUIRED:
 | |
|                 return strtr($string,array(
 | |
|                                           '&'  => '&',
 | |
|                                           '<'  => '<',
 | |
|                                           '"'  => '"' ));
 | |
|                 break;
 | |
|             case PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_HTML:
 | |
|                 return htmlspecialchars($string);
 | |
|                 break;
 | |
|         }
 | |
|         return $string;
 | |
|     }
 | |
| 
 | |
|    /**
 | |
|     * build an xml declaration
 | |
|     *
 | |
|     * <code>
 | |
|     * require_once 'XML/Util.php';
 | |
|     * 
 | |
|     * // get an XML declaration:
 | |
|     * $xmlDecl = PEAR_PackageFile_Generator_v2_XML_Util::getXMLDeclaration("1.0", "UTF-8", true);
 | |
|     * </code>
 | |
|     *
 | |
|     * @access   public
 | |
|     * @static
 | |
|     * @param    string  $version     xml version
 | |
|     * @param    string  $encoding    character encoding
 | |
|     * @param    boolean $standAlone  document is standalone (or not)
 | |
|     * @return   string  $decl xml declaration
 | |
|     * @uses     PEAR_PackageFile_Generator_v2_XML_Util::attributesToString() to serialize the attributes of the XML declaration
 | |
|     */
 | |
|     function getXMLDeclaration($version = "1.0", $encoding = null, $standalone = null)
 | |
|     {
 | |
|         $attributes = array(
 | |
|                             "version" => $version,
 | |
|                            );
 | |
|         // add encoding
 | |
|         if ($encoding !== null) {
 | |
|             $attributes["encoding"] = $encoding;
 | |
|         }
 | |
|         // add standalone, if specified
 | |
|         if ($standalone !== null) {
 | |
|             $attributes["standalone"] = $standalone ? "yes" : "no";
 | |
|         }
 | |
|         
 | |
|         return sprintf("<?xml%s?>", PEAR_PackageFile_Generator_v2_XML_Util::attributesToString($attributes, false));
 | |
|     }
 | |
| 
 | |
|    /**
 | |
|     * build a document type declaration
 | |
|     *
 | |
|     * <code>
 | |
|     * require_once 'XML/Util.php';
 | |
|     * 
 | |
|     * // get a doctype declaration:
 | |
|     * $xmlDecl = PEAR_PackageFile_Generator_v2_XML_Util::getDocTypeDeclaration("rootTag","myDocType.dtd");
 | |
|     * </code>
 | |
|     *
 | |
|     * @access   public
 | |
|     * @static
 | |
|     * @param    string  $root         name of the root tag
 | |
|     * @param    string  $uri          uri of the doctype definition (or array with uri and public id)
 | |
|     * @param    string  $internalDtd  internal dtd entries   
 | |
|     * @return   string  $decl         doctype declaration
 | |
|     * @since    0.2
 | |
|     */
 | |
|     function getDocTypeDeclaration($root, $uri = null, $internalDtd = null)
 | |
|     {
 | |
|         if (is_array($uri)) {
 | |
|             $ref = sprintf( ' PUBLIC "%s" "%s"', $uri["id"], $uri["uri"] );
 | |
|         } elseif (!empty($uri)) {
 | |
|             $ref = sprintf( ' SYSTEM "%s"', $uri );
 | |
|         } else {
 | |
|             $ref = "";
 | |
|         }
 | |
| 
 | |
|         if (empty($internalDtd)) {
 | |
|             return sprintf("<!DOCTYPE %s%s>", $root, $ref);
 | |
|         } else {
 | |
|             return sprintf("<!DOCTYPE %s%s [\n%s\n]>", $root, $ref, $internalDtd);
 | |
|         }
 | |
|     }
 | |
| 
 | |
|    /**
 | |
|     * create string representation of an attribute list
 | |
|     *
 | |
|     * <code>
 | |
|     * require_once 'XML/Util.php';
 | |
|     * 
 | |
|     * // build an attribute string
 | |
|     * $att = array(
 | |
|     *              "foo"   =>  "bar",
 | |
|     *              "argh"  =>  "tomato"
 | |
|     *            );
 | |
|     *
 | |
|     * $attList = PEAR_PackageFile_Generator_v2_XML_Util::attributesToString($att);    
 | |
|     * </code>
 | |
|     *
 | |
|     * @access   public
 | |
|     * @static
 | |
|     * @param    array         $attributes        attribute array
 | |
|     * @param    boolean|array $sort              sort attribute list alphabetically, may also be an assoc array containing the keys 'sort', 'multiline', 'indent', 'linebreak' and 'entities'
 | |
|     * @param    boolean       $multiline         use linebreaks, if more than one attribute is given
 | |
|     * @param    string        $indent            string used for indentation of multiline attributes
 | |
|     * @param    string        $linebreak         string used for linebreaks of multiline attributes
 | |
|     * @param    integer       $entities          setting for entities in attribute values (one of PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_NONE, PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML, PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML_REQUIRED, PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_HTML)
 | |
|     * @return   string                           string representation of the attributes
 | |
|     * @uses     PEAR_PackageFile_Generator_v2_XML_Util::replaceEntities() to replace XML entities in attribute values
 | |
|     * @todo     allow sort also to be an options array
 | |
|     */
 | |
|     function attributesToString($attributes, $sort = true, $multiline = false, $indent = '    ', $linebreak = "\n", $entities = PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML)
 | |
|     {
 | |
|         /**
 | |
|          * second parameter may be an array
 | |
|          */
 | |
|         if (is_array($sort)) {
 | |
|             if (isset($sort['multiline'])) {
 | |
|                 $multiline = $sort['multiline'];
 | |
|             }
 | |
|             if (isset($sort['indent'])) {
 | |
|                 $indent = $sort['indent'];
 | |
|             }
 | |
|             if (isset($sort['linebreak'])) {
 | |
|                 $multiline = $sort['linebreak'];
 | |
|             }
 | |
|             if (isset($sort['entities'])) {
 | |
|                 $entities = $sort['entities'];
 | |
|             }
 | |
|             if (isset($sort['sort'])) {
 | |
|                 $sort = $sort['sort'];
 | |
|             } else {
 | |
|                 $sort = true;
 | |
|             }
 | |
|         }
 | |
|         $string = '';
 | |
|         if (is_array($attributes) && !empty($attributes)) {
 | |
|             if ($sort) {
 | |
|                 ksort($attributes);
 | |
|             }
 | |
|             if( !$multiline || count($attributes) == 1) {
 | |
|                 foreach ($attributes as $key => $value) {
 | |
|                     if ($entities != PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_NONE) {
 | |
|                         $value = PEAR_PackageFile_Generator_v2_XML_Util::replaceEntities($value, $entities);
 | |
|                     }
 | |
|                     $string .= ' '.$key.'="'.$value.'"';
 | |
|                 }
 | |
|             } else {
 | |
|                 $first = true;
 | |
|                 foreach ($attributes as $key => $value) {
 | |
|                     if ($entities != PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_NONE) {
 | |
|                         $value = PEAR_PackageFile_Generator_v2_XML_Util::replaceEntities($value, $entities);
 | |
|                     }
 | |
|                     if ($first) {
 | |
|                         $string .= " ".$key.'="'.$value.'"';
 | |
|                         $first = false;
 | |
|                     } else {
 | |
|                         $string .= $linebreak.$indent.$key.'="'.$value.'"';
 | |
|                     }
 | |
|                 }
 | |
|             }
 | |
|         }
 | |
|         return $string;
 | |
|     }
 | |
| 
 | |
|    /**
 | |
|     * create a tag
 | |
|     *
 | |
|     * This method will call PEAR_PackageFile_Generator_v2_XML_Util::createTagFromArray(), which
 | |
|     * is more flexible.
 | |
|     *
 | |
|     * <code>
 | |
|     * require_once 'XML/Util.php';
 | |
|     * 
 | |
|     * // create an XML tag:
 | |
|     * $tag = PEAR_PackageFile_Generator_v2_XML_Util::createTag("myNs:myTag", array("foo" => "bar"), "This is inside the tag", "http://www.w3c.org/myNs#");
 | |
|     * </code>
 | |
|     *
 | |
|     * @access   public
 | |
|     * @static
 | |
|     * @param    string  $qname             qualified tagname (including namespace)
 | |
|     * @param    array   $attributes        array containg attributes
 | |
|     * @param    mixed   $content
 | |
|     * @param    string  $namespaceUri      URI of the namespace
 | |
|     * @param    integer $replaceEntities   whether to replace XML special chars in content, embedd it in a CData section or none of both
 | |
|     * @param    boolean $multiline         whether to create a multiline tag where each attribute gets written to a single line
 | |
|     * @param    string  $indent            string used to indent attributes (_auto indents attributes so they start at the same column)
 | |
|     * @param    string  $linebreak         string used for linebreaks
 | |
|     * @param    string  $encoding          encoding that should be used to translate content
 | |
|     * @return   string  $string            XML tag
 | |
|     * @see      PEAR_PackageFile_Generator_v2_XML_Util::createTagFromArray()
 | |
|     * @uses     PEAR_PackageFile_Generator_v2_XML_Util::createTagFromArray() to create the tag
 | |
|     */
 | |
|     function createTag($qname, $attributes = array(), $content = null, $namespaceUri = null, $replaceEntities = PEAR_PackageFile_Generator_v2_XML_Util_REPLACE_ENTITIES, $multiline = false, $indent = "_auto", $linebreak = "\n", $encoding = PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML)
 | |
|     {
 | |
|         $tag = array(
 | |
|                      "qname"      => $qname,
 | |
|                      "attributes" => $attributes
 | |
|                     );
 | |
| 
 | |
|         // add tag content
 | |
|         if ($content !== null) {
 | |
|             $tag["content"] = $content;
 | |
|         }
 | |
|         
 | |
|         // add namespace Uri
 | |
|         if ($namespaceUri !== null) {
 | |
|             $tag["namespaceUri"] = $namespaceUri;
 | |
|         }
 | |
| 
 | |
|         return PEAR_PackageFile_Generator_v2_XML_Util::createTagFromArray($tag, $replaceEntities, $multiline, $indent, $linebreak, $encoding);
 | |
|     }
 | |
| 
 | |
|    /**
 | |
|     * create a tag from an array
 | |
|     * this method awaits an array in the following format
 | |
|     * <pre>
 | |
|     * array(
 | |
|     *  "qname"        => $qname         // qualified name of the tag
 | |
|     *  "namespace"    => $namespace     // namespace prefix (optional, if qname is specified or no namespace)
 | |
|     *  "localpart"    => $localpart,    // local part of the tagname (optional, if qname is specified)
 | |
|     *  "attributes"   => array(),       // array containing all attributes (optional)
 | |
|     *  "content"      => $content,      // tag content (optional)
 | |
|     *  "namespaceUri" => $namespaceUri  // namespaceUri for the given namespace (optional)
 | |
|     *   )
 | |
|     * </pre>
 | |
|     *
 | |
|     * <code>
 | |
|     * require_once 'XML/Util.php';
 | |
|     * 
 | |
|     * $tag = array(
 | |
|     *           "qname"        => "foo:bar",
 | |
|     *           "namespaceUri" => "http://foo.com",
 | |
|     *           "attributes"   => array( "key" => "value", "argh" => "fruit&vegetable" ),
 | |
|     *           "content"      => "I'm inside the tag",
 | |
|     *            );
 | |
|     * // creating a tag with qualified name and namespaceUri
 | |
|     * $string = PEAR_PackageFile_Generator_v2_XML_Util::createTagFromArray($tag);
 | |
|     * </code>
 | |
|     *
 | |
|     * @access   public
 | |
|     * @static
 | |
|     * @param    array   $tag               tag definition
 | |
|     * @param    integer $replaceEntities   whether to replace XML special chars in content, embedd it in a CData section or none of both
 | |
|     * @param    boolean $multiline         whether to create a multiline tag where each attribute gets written to a single line
 | |
|     * @param    string  $indent            string used to indent attributes (_auto indents attributes so they start at the same column)
 | |
|     * @param    string  $linebreak         string used for linebreaks
 | |
|     * @return   string  $string            XML tag
 | |
|     * @see      PEAR_PackageFile_Generator_v2_XML_Util::createTag()
 | |
|     * @uses     PEAR_PackageFile_Generator_v2_XML_Util::attributesToString() to serialize the attributes of the tag
 | |
|     * @uses     PEAR_PackageFile_Generator_v2_XML_Util::splitQualifiedName() to get local part and namespace of a qualified name
 | |
|     */
 | |
|     function createTagFromArray($tag, $replaceEntities = PEAR_PackageFile_Generator_v2_XML_Util_REPLACE_ENTITIES, $multiline = false, $indent = "_auto", $linebreak = "\n", $encoding = PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML)
 | |
|     {
 | |
|         if (isset($tag["content"]) && !is_scalar($tag["content"])) {
 | |
|             return PEAR_PackageFile_Generator_v2_XML_Util::raiseError( "Supplied non-scalar value as tag content", PEAR_PackageFile_Generator_v2_XML_Util_ERROR_NON_SCALAR_CONTENT );
 | |
|         }
 | |
| 
 | |
|         if (!isset($tag['qname']) && !isset($tag['localPart'])) {
 | |
|             return PEAR_PackageFile_Generator_v2_XML_Util::raiseError( 'You must either supply a qualified name (qname) or local tag name (localPart).', PEAR_PackageFile_Generator_v2_XML_Util_ERROR_NO_TAG_NAME );
 | |
|         }
 | |
| 
 | |
|         // if no attributes hav been set, use empty attributes
 | |
|         if (!isset($tag["attributes"]) || !is_array($tag["attributes"])) {
 | |
|             $tag["attributes"] = array();
 | |
|         }
 | |
|         
 | |
|         // qualified name is not given
 | |
|         if (!isset($tag["qname"])) {
 | |
|             // check for namespace
 | |
|             if (isset($tag["namespace"]) && !empty($tag["namespace"])) {
 | |
|                 $tag["qname"] = $tag["namespace"].":".$tag["localPart"];
 | |
|             } else {
 | |
|                 $tag["qname"] = $tag["localPart"];
 | |
|             }
 | |
|         // namespace URI is set, but no namespace
 | |
|         } elseif (isset($tag["namespaceUri"]) && !isset($tag["namespace"])) {
 | |
|             $parts = PEAR_PackageFile_Generator_v2_XML_Util::splitQualifiedName($tag["qname"]);
 | |
|             $tag["localPart"] = $parts["localPart"];
 | |
|             if (isset($parts["namespace"])) {
 | |
|                 $tag["namespace"] = $parts["namespace"];
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         if (isset($tag["namespaceUri"]) && !empty($tag["namespaceUri"])) {
 | |
|             // is a namespace given
 | |
|             if (isset($tag["namespace"]) && !empty($tag["namespace"])) {
 | |
|                 $tag["attributes"]["xmlns:".$tag["namespace"]] = $tag["namespaceUri"];
 | |
|             } else {
 | |
|                 // define this Uri as the default namespace
 | |
|                 $tag["attributes"]["xmlns"] = $tag["namespaceUri"];
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         // check for multiline attributes
 | |
|         if ($multiline === true) {
 | |
|             if ($indent === "_auto") {
 | |
|                 $indent = str_repeat(" ", (strlen($tag["qname"])+2));
 | |
|             }
 | |
|         }
 | |
|         
 | |
|         // create attribute list
 | |
|         $attList    =   PEAR_PackageFile_Generator_v2_XML_Util::attributesToString($tag["attributes"], true, $multiline, $indent, $linebreak );
 | |
|         if (!isset($tag["content"]) || (string)$tag["content"] == '') {
 | |
|             $tag    =   sprintf("<%s%s />", $tag["qname"], $attList);
 | |
|         } else {
 | |
|             if ($replaceEntities == PEAR_PackageFile_Generator_v2_XML_Util_REPLACE_ENTITIES) {
 | |
|                 $tag["content"] = PEAR_PackageFile_Generator_v2_XML_Util::replaceEntities($tag["content"], $encoding);
 | |
|             } elseif ($replaceEntities == PEAR_PackageFile_Generator_v2_XML_Util_CDATA_SECTION) {
 | |
|                 $tag["content"] = PEAR_PackageFile_Generator_v2_XML_Util::createCDataSection($tag["content"]);
 | |
|             }
 | |
|             $tag    =   sprintf("<%s%s>%s</%s>", $tag["qname"], $attList, $tag["content"], $tag["qname"] );
 | |
|         }        
 | |
|         return  $tag;
 | |
|     }
 | |
| 
 | |
|    /**
 | |
|     * create a start element
 | |
|     *
 | |
|     * <code>
 | |
|     * require_once 'XML/Util.php';
 | |
|     * 
 | |
|     * // create an XML start element:
 | |
|     * $tag = PEAR_PackageFile_Generator_v2_XML_Util::createStartElement("myNs:myTag", array("foo" => "bar") ,"http://www.w3c.org/myNs#");
 | |
|     * </code>
 | |
|     *
 | |
|     * @access   public
 | |
|     * @static
 | |
|     * @param    string  $qname             qualified tagname (including namespace)
 | |
|     * @param    array   $attributes        array containg attributes
 | |
|     * @param    string  $namespaceUri      URI of the namespace
 | |
|     * @param    boolean $multiline         whether to create a multiline tag where each attribute gets written to a single line
 | |
|     * @param    string  $indent            string used to indent attributes (_auto indents attributes so they start at the same column)
 | |
|     * @param    string  $linebreak         string used for linebreaks
 | |
|     * @return   string  $string            XML start element
 | |
|     * @see      PEAR_PackageFile_Generator_v2_XML_Util::createEndElement(), PEAR_PackageFile_Generator_v2_XML_Util::createTag()
 | |
|     */
 | |
|     function createStartElement($qname, $attributes = array(), $namespaceUri = null, $multiline = false, $indent = '_auto', $linebreak = "\n")
 | |
|     {
 | |
|         // if no attributes hav been set, use empty attributes
 | |
|         if (!isset($attributes) || !is_array($attributes)) {
 | |
|             $attributes = array();
 | |
|         }
 | |
|         
 | |
|         if ($namespaceUri != null) {
 | |
|             $parts = PEAR_PackageFile_Generator_v2_XML_Util::splitQualifiedName($qname);
 | |
|         }
 | |
| 
 | |
|         // check for multiline attributes
 | |
|         if ($multiline === true) {
 | |
|             if ($indent === "_auto") {
 | |
|                 $indent = str_repeat(" ", (strlen($qname)+2));
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         if ($namespaceUri != null) {
 | |
|             // is a namespace given
 | |
|             if (isset($parts["namespace"]) && !empty($parts["namespace"])) {
 | |
|                 $attributes["xmlns:".$parts["namespace"]] = $namespaceUri;
 | |
|             } else {
 | |
|                 // define this Uri as the default namespace
 | |
|                 $attributes["xmlns"] = $namespaceUri;
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         // create attribute list
 | |
|         $attList    =   PEAR_PackageFile_Generator_v2_XML_Util::attributesToString($attributes, true, $multiline, $indent, $linebreak);
 | |
|         $element    =   sprintf("<%s%s>", $qname, $attList);
 | |
|         return  $element;
 | |
|     }
 | |
| 
 | |
|    /**
 | |
|     * create an end element
 | |
|     *
 | |
|     * <code>
 | |
|     * require_once 'XML/Util.php';
 | |
|     * 
 | |
|     * // create an XML start element:
 | |
|     * $tag = PEAR_PackageFile_Generator_v2_XML_Util::createEndElement("myNs:myTag");
 | |
|     * </code>
 | |
|     *
 | |
|     * @access   public
 | |
|     * @static
 | |
|     * @param    string  $qname             qualified tagname (including namespace)
 | |
|     * @return   string  $string            XML end element
 | |
|     * @see      PEAR_PackageFile_Generator_v2_XML_Util::createStartElement(), PEAR_PackageFile_Generator_v2_XML_Util::createTag()
 | |
|     */
 | |
|     function createEndElement($qname)
 | |
|     {
 | |
|         $element    =   sprintf("</%s>", $qname);
 | |
|         return  $element;
 | |
|     }
 | |
|     
 | |
|    /**
 | |
|     * create an XML comment
 | |
|     *
 | |
|     * <code>
 | |
|     * require_once 'XML/Util.php';
 | |
|     * 
 | |
|     * // create an XML start element:
 | |
|     * $tag = PEAR_PackageFile_Generator_v2_XML_Util::createComment("I am a comment");
 | |
|     * </code>
 | |
|     *
 | |
|     * @access   public
 | |
|     * @static
 | |
|     * @param    string  $content           content of the comment
 | |
|     * @return   string  $comment           XML comment
 | |
|     */
 | |
|     function createComment($content)
 | |
|     {
 | |
|         $comment    =   sprintf("<!-- %s -->", $content);
 | |
|         return  $comment;
 | |
|     }
 | |
|     
 | |
|    /**
 | |
|     * create a CData section
 | |
|     *
 | |
|     * <code>
 | |
|     * require_once 'XML/Util.php';
 | |
|     * 
 | |
|     * // create a CData section
 | |
|     * $tag = PEAR_PackageFile_Generator_v2_XML_Util::createCDataSection("I am content.");
 | |
|     * </code>
 | |
|     *
 | |
|     * @access   public
 | |
|     * @static
 | |
|     * @param    string  $data              data of the CData section
 | |
|     * @return   string  $string            CData section with content
 | |
|     */
 | |
|     function createCDataSection($data)
 | |
|     {
 | |
|         return  sprintf("<![CDATA[%s]]>", $data);
 | |
|     }
 | |
| 
 | |
|    /**
 | |
|     * split qualified name and return namespace and local part
 | |
|     *
 | |
|     * <code>
 | |
|     * require_once 'XML/Util.php';
 | |
|     * 
 | |
|     * // split qualified tag
 | |
|     * $parts = PEAR_PackageFile_Generator_v2_XML_Util::splitQualifiedName("xslt:stylesheet");
 | |
|     * </code>
 | |
|     * the returned array will contain two elements:
 | |
|     * <pre>
 | |
|     * array(
 | |
|     *       "namespace" => "xslt",
 | |
|     *       "localPart" => "stylesheet"
 | |
|     *      );
 | |
|     * </pre>
 | |
|     *
 | |
|     * @access public
 | |
|     * @static
 | |
|     * @param  string    $qname      qualified tag name
 | |
|     * @param  string    $defaultNs  default namespace (optional)
 | |
|     * @return array     $parts      array containing namespace and local part
 | |
|     */
 | |
|     function splitQualifiedName($qname, $defaultNs = null)
 | |
|     {
 | |
|         if (strstr($qname, ':')) {
 | |
|             $tmp = explode(":", $qname);
 | |
|             return array(
 | |
|                           "namespace" => $tmp[0],
 | |
|                           "localPart" => $tmp[1]
 | |
|                         );
 | |
|         }
 | |
|         return array(
 | |
|                       "namespace" => $defaultNs,
 | |
|                       "localPart" => $qname
 | |
|                     );
 | |
|     }
 | |
| 
 | |
|    /**
 | |
|     * check, whether string is valid XML name
 | |
|     *
 | |
|     * <p>XML names are used for tagname, attribute names and various
 | |
|     * other, lesser known entities.</p>
 | |
|     * <p>An XML name may only consist of alphanumeric characters,
 | |
|     * dashes, undescores and periods, and has to start with a letter
 | |
|     * or an underscore.
 | |
|     * </p>
 | |
|     *
 | |
|     * <code>
 | |
|     * require_once 'XML/Util.php';
 | |
|     * 
 | |
|     * // verify tag name
 | |
|     * $result = PEAR_PackageFile_Generator_v2_XML_Util::isValidName("invalidTag?");
 | |
|     * if (PEAR_PackageFile_Generator_v2_XML_Util::isError($result)) {
 | |
|     *    print "Invalid XML name: " . $result->getMessage();
 | |
|     * }
 | |
|     * </code>
 | |
|     *
 | |
|     * @access  public
 | |
|     * @static
 | |
|     * @param   string  $string string that should be checked
 | |
|     * @return  mixed   $valid  true, if string is a valid XML name, PEAR error otherwise
 | |
|     * @todo    support for other charsets
 | |
|     */
 | |
|     function isValidName($string)
 | |
|     {
 | |
|         // check for invalid chars
 | |
|         if (!preg_match("/^[[:alnum:]_\-.]$/", $string{0})) {
 | |
|             return PEAR_PackageFile_Generator_v2_XML_Util::raiseError( "XML names may only start with letter or underscore", PEAR_PackageFile_Generator_v2_XML_Util_ERROR_INVALID_START );
 | |
|         }
 | |
|         
 | |
|         // check for invalid chars
 | |
|         if (!preg_match("/^([a-zA-Z_]([a-zA-Z0-9_\-\.]*)?:)?[a-zA-Z_]([a-zA-Z0-9_\-\.]+)?$/", $string)) {
 | |
|             return PEAR_PackageFile_Generator_v2_XML_Util::raiseError( "XML names may only contain alphanumeric chars, period, hyphen, colon and underscores", PEAR_PackageFile_Generator_v2_XML_Util_ERROR_INVALID_CHARS );
 | |
|          }
 | |
|         // XML name is valid
 | |
|         return true;
 | |
|     }
 | |
| 
 | |
|    /**
 | |
|     * replacement for PEAR_PackageFile_Generator_v2_XML_Util::raiseError
 | |
|     *
 | |
|     * Avoids the necessity to always require
 | |
|     * PEAR.php
 | |
|     *
 | |
|     * @access   public
 | |
|     * @param    string      error message
 | |
|     * @param    integer     error code
 | |
|     * @return   object PEAR_Error
 | |
|     */
 | |
|     function raiseError($msg, $code)
 | |
|     {
 | |
|         require_once 'PEAR.php';
 | |
|         return PEAR::raiseError($msg, $code);
 | |
|     }
 | |
| }
 | |
| ?>
 |